﻿Imports Entidades
Imports Datos
Public Class daoRepartidores

    Dim x As DBRepartidores
    Sub New()
        x = New DBRepartidores

    End Sub

    Function altarepartidor(ByVal nodo As Repartidores) As Boolean
        Return x.AltaRepartidor(nodo)
    End Function
    Function consultarepartidor() As ArrayList
        Return x.consultarepartidor

    End Function
    Function bajarepartidor(ByVal nodo As Repartidores) As Boolean
        Return x.BajaRepartidor(nodo)
    End Function
End Class



